/**
 * JAVACC DEMO 1.0
 * @copy right iussoft company All rights reserved.
 * @Package com.iussoft.annotaion
 */
package com.apache.portal.common.annotion;

import java.io.File;
import java.io.FileFilter;
import java.io.IOException;
import java.net.JarURLConnection;
import java.net.URL;
import java.net.URLDecoder;
import java.util.Enumeration;
import java.util.jar.JarEntry;
import java.util.jar.JarFile;

import javax.servlet.http.HttpServlet;

import org.apache.log4j.Logger;

import com.apache.portal.common.restfull.ResultFullAnntation;
import com.apache.portal.common.restfull.ResultFullServletSupper;
import com.apache.tools.StrUtil;

/**
 * description:  自动扫描指定包下的类
 * @author dyhou 创建时间：2017-4-18  
 */
public class AnnotationUtil {

	private static AnnotationUtil instance;
	private Logger log = Logger.getLogger(getClass());

	private AnnotationUtil() {
	}

	public static AnnotationUtil getInstance() {
		if (null == instance) {
			instance = new AnnotationUtil();
		}
		return (instance);
	}

	/**
	 * @param packName 要扫描的包(多个用','隔开，如：com.iussoft.portal,com.apache.web)
	 */
	public void findFileClass(String packName) {
		if (StrUtil.isNull(packName))
			return;
		String pkNames[] = packName.split(",");
		boolean recursive = true;
		for (int i = 0; i < pkNames.length; i++) {
			String pName = pkNames[i];
			String packageDirName = pName.replace('.', '/');
			Enumeration<URL> dirs;
			try {
				dirs = Thread.currentThread().getContextClassLoader().getResources(packageDirName);
				while (dirs.hasMoreElements()) {
					URL url = dirs.nextElement();
					String protocol = url.getProtocol();
					if ("file".equals(protocol)) {//扫描file包中的类
						String filePath = URLDecoder.decode(url.getFile(), "UTF-8");
						findAndAddClassesInPackageByFile(pName, filePath, recursive);
					} else if ("jar".equals(protocol)) {//扫描jar包中的类
						try {
							JarFile jar = ((JarURLConnection) url.openConnection()).getJarFile();// 获取jar
							loadJarClassBean(jar, packageDirName, pName, recursive);
						} catch (IOException e) {
							log.error("在扫描用户定义视图时从jar包获取文件出错", e);
						}
					}
				}
			} catch (Exception e) {
				e.getStackTrace();
			}
		}
	}

	/**
	 * 从包package中获取所有的Class
	 * @param pack
	 */
	public boolean loadCalssBean(String pack) {
		if (StrUtil.isNull(pack))
			return false;
		// 是否循环迭代  
		boolean recursive = true;
		// 获取包的名字 并进行替换  
		String packageName = pack;
		String packageDirName = packageName.replace('.', '/');
		// 定义一个枚举的集合 并进行循环来处理这个目录下的things  
		Enumeration<URL> dirs;
		try {
			dirs = Thread.currentThread().getContextClassLoader().getResources(packageDirName);
			// 循环迭代下去  
			while (dirs.hasMoreElements()) {
				// 获取下一个元素  
				URL url = dirs.nextElement();
				// 得到协议的名称  
				String protocol = url.getProtocol();
				// 如果是以文件的形式保存在服务器上  
				if ("file".equals(protocol)) {
					// 获取包的物理路径  
					String filePath = URLDecoder.decode(url.getFile(), "UTF-8");
					// 以文件的方式扫描整个包下的文件 并添加到集合中  
					findAndAddClassesInPackageByFile(packageName, filePath, recursive);
				} else if ("jar".equals(protocol)) {
					try {
						JarFile jar = ((JarURLConnection) url.openConnection()).getJarFile();// 获取jar
						loadJarClassBean(jar, packageDirName, packageName, recursive);
					} catch (IOException e) {
						log.error("在扫描用户定义视图时从jar包获取文件出错", e);
					}
				}
			}
		} catch (IOException e) {
			log.error("执行类扫描失败", e);
		}
		return true;
	}

	/**
	 * 获取jar包下的所有Class
	 */
	private void loadJarClassBean(JarFile jar, String packageDirName, String packageName, boolean recursive) {
		Enumeration<JarEntry> entries = jar.entries();// 从此jar包 得到一个枚举类  
		while (entries.hasMoreElements()) {// 同样的进行循环迭代  
			// 获取jar里的一个实体 可以是目录 和一些jar包里的其他文件 如META-INF等文件  
			JarEntry entry = entries.nextElement();
			String name = entry.getName();
			if (name.charAt(0) == '/') {// 如果是以/开头的  
				name = name.substring(1);// 获取后面的字符串  
			}
			if (name.startsWith(packageDirName)) {// 如果前半部分和定义的包名相同 
				int idx = name.lastIndexOf('/');
				if (idx != -1) {// 如果以"/"结尾 是一个包  
					packageName = name.substring(0, idx).replace('/', '.');// 获取包名 把"/"替换成"."  
				}
				if ((idx != -1) || recursive) {// 如果可以迭代下去 并且是一个包  
					if (name.endsWith(".class") && !entry.isDirectory()) {// 如果是一个.class文件 而且不是目录  
						String className = name.substring(packageName.length() + 1, name.length() - 6);// 去掉后面的".class" 获取真正的类名  
						try {
							Class<?> clazz = Class.forName(packageName + '.' + className);
							annotaitonBean(clazz, className);
						} catch (Exception e) {
							log.error("添加用户自定义视图类错误 找不到此类的.class文件", e);
						}
					}
				}
			}
		}
	}

	/**
	 * 以文件的形式来获取包下的所有Class
	 *  
	 * @param packageName
	 * @param packagePath
	 * @param recursive
	 */
	private void findAndAddClassesInPackageByFile(String packageName, String packagePath, final boolean recursive) {
		File dir = new File(packagePath);// 获取此包的目录 建立一个File
		if (!dir.exists() || !dir.isDirectory()) {// 如果不存在或者 也不是目录就直接返回  
			log.warn("包名 " + packageName + " 下没有任何文件");
			return;
		}
		File[] dirfiles = dir.listFiles(new FileFilter() {// 如果存在 就获取包下的所有文件 包括目录  
					public boolean accept(File file) {// 自定义过滤规则 如果可以循环(包含子目录) 或则是以.class结尾的文件(编译好的java类文件) 
						return (recursive && file.isDirectory()) || (file.getName().endsWith(".class"));
					}
				});
		for (File file : dirfiles) {// 循环所有文件  
			if (file.isDirectory()) {// 如果是目录 则继续扫描
				findAndAddClassesInPackageByFile(packageName + "." + file.getName(), file.getAbsolutePath(), recursive);
			} else {
				String className = file.getName().substring(0, file.getName().length() - 6);// 如果是java类文件 去掉后面的.class 只留下类名  
				log.warn(className);
				try {
					Class<?> clazz = Class.forName(packageName + '.' + className);
					annotaitonBean(clazz, className);
				} catch (Exception e) {
					log.error("添加视图类错误 找不到此类的.class文件", e);
				}
			}
		}
	}

	private void annotaitonBean(Class<?> calsz, String shortName) throws InstantiationException, IllegalAccessException {
		if (calsz.isAnnotationPresent(AnntationBean.class)) {
			AnntationBean annotation = calsz.getAnnotation(AnntationBean.class);
			String key = StrUtil.doNull(annotation.name(), toLowerCaseFirstOne(shortName));
			BeanFactory.getInstance().setBeans(key, calsz.newInstance());
		} else if (calsz.isAnnotationPresent(ResultFullAnntation.class)) {
			ResultFullAnntation annotation = calsz.getAnnotation(ResultFullAnntation.class);
			String name = StrUtil.doNull(annotation.name(), toLowerCaseFirstOne(shortName));
			String[] urlPatterns = annotation.urlPatterns();
			HttpServlet servlet = (HttpServlet) calsz.newInstance();
			ResultFullServletSupper servletBean = new ResultFullServletSupper(name, urlPatterns, servlet);
			for (String urlPattern : urlPatterns) {
				BeanFactory.getInstance().setServlets(urlPattern.replaceAll("\\*", "([^\\/]\\*)"), servletBean);
			}
		}
	}

	private String toLowerCaseFirstOne(String s) {
		if (Character.isLowerCase(s.charAt(0))) {
			return s;
		} else {
			return (new StringBuilder()).append(Character.toLowerCase(s.charAt(0))).append(s.substring(1)).toString();
		}
	}
}
